home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Night Owl 6
/
Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso
/
019a
/
tsqed12.zip
/
TOASC.QMA
< prev
next >
Wrap
Text File
|
1990-11-11
|
651b
|
15 lines
*
* Convert Scandinavian characters to 7-bit ascii
* By Timo Salmi, Sun 11-Nov-1990
* To compile apply QMAC TOASC.MAC TOASC.QMA /A- /B
*
@5 MacroBegin
BegFile FindReplace "ä" Return "{" Return Return JFalse next01: "r" next01:
BegFile FindReplace "å" Return "}" Return Return JFalse next02: "r" next02:
BegFile FindReplace "ö" Return "|" Return Return JFalse next03: "r" next03:
BegFile FindReplace "Ä" Return "[" Return Return JFalse next04: "r" next04:
BegFile FindReplace "Å" Return "]" Return Return JFalse next05: "r" next05:
BegFile FindReplace "Ö" Return "\" Return Return JFalse next06: "r" next06:
BegFile